<?php
	$Flag=$_POST['m_Flag'];
	
	include ("../Conexciones/Conexcion.php");
	include ("./Procesos_Motor.php");
	include ("../Clases/CProyecto.php");
	
	switch($Flag)
	{
		case 1:
			$LocalConexcion=$Conexcion;
			$Obj = new Proyecto;
			$ObjInvesti = new Investigadores;
			$ObjEmpres =new Empresa;
			$ObjBecario = new Becarios;
			$ClaveProy=ObtenerClave($LocalConexcion);
			$Fechainicio=$_POST['m_FechaInicial'];
			$FechaFin=$_POST['m_FechaFinal'];
			
			$Obj->Tipo =str_ireplace("'","",$_POST['m_TipoProy']);
			$Obj->Titulo=str_ireplace("'","",$_POST['m_Titulo']);
			$Obj->Entidad=str_ireplace("'","",$_POST['m_Entidad']);
			$Obj->FechaInicio=str_ireplace("'","",FormatearFecha($Fechainicio));
			$Obj->FechaFin=str_ireplace("'","",FormatearFecha($FechaFin));
			$Obj->Area=str_ireplace("'","",$_POST['m_Area']);
			$Obj->Diciplina=str_ireplace("'","",$_POST['m_Diciplina']);
			$Obj->Subdiciplina=str_ireplace("'","",$_POST['m_Subdcpln']);
			$Obj->Sector=str_ireplace("'","",$_POST['m_Sector']);
			$Obj->Rama=str_ireplace("'","",$_POST['m_Rama']);
			$Obj->Clase=str_ireplace("'","",$_POST['m_Clase']);
			$Obj->Logros=str_ireplace("'","",$_POST['m_Logro']);
			$Obj->IdMaestro=str_ireplace("'","",$_POST['m_IdPro']);
			
			$ObjEmpres->Nombre1=str_ireplace("'","",$_POST['m_investi1']);
			$ObjEmpres->Nombre2=str_ireplace("'","",$_POST['m_investi2']);
			$ObjEmpres->Nombre3=str_ireplace("'","",$_POST['m_investi3']);
			$ObjEmpres->Nombre4=str_ireplace("'","",$_POST['m_investi4']);
			$ObjEmpres->Nombre5=str_ireplace("'","",$_POST['m_investi5']);
			
			$ObjInvesti->Nombre1=str_ireplace("'","",$_POST['m_Inv1']);
			$ObjInvesti->Nombre2=str_ireplace("'","",$_POST['m_Inv2']);
			$ObjInvesti->Nombre3=str_ireplace("'","",$_POST['m_Inv3']);
			$ObjInvesti->Nombre4=str_ireplace("'","",$_POST['m_Inv4']);
			$ObjInvesti->Nombre5=str_ireplace("'","",$_POST['m_Inv5']);
			
			$ObjBecario->Nombre1=str_ireplace("'","",$_POST['m_becario1']);
			$ObjBecario->Nombre2=str_ireplace("'","",$_POST['m_becario2']);
			$ObjBecario->Nombre3=str_ireplace("'","",$_POST['m_becario3']);
			$ObjBecario->Nombre4=str_ireplace("'","",$_POST['m_becario4']);
			$ObjBecario->Nombre5=str_ireplace("'","",$_POST['m_becario5']);
			
			if(IniciarTransaccion($LocalConexcion))
			{
				if(InsertarProyectos($LocalConexcion))
				{
					if(InsertarInvestigadores($LocalConexcion))
					{
						if(InsertarEmpresas($LocalConexcion))
						{
							if(InsertarBecario($LocalConexcion))
							{
								Commit($LocalConexcion);
								echo "<script>alert('Proyecto Guardado');
											  document.location.href='../Menu_Usuarios/Investigacion.php';</script>";
							}
							else
							{
								Rollback($LocalConexcion);
							}
						}
						else
						{
							Rollback($LocalConexcion);
						}
					}
					else
					{
						Rollback($LocalConexcion);
					}
				}
				else
				{
					Rollback($LocalConexcion);
				}
				
			}
			
		break;
	}
	
	function ObtenerClave($_Conexcion)
	{
		$bFlag=false;
		$Sql="Select siguienteproyecto()";
		$Clave;
		if($Res=pg_query($_Conexcion,$Sql))
		{
			if($Row=pg_fetch_array($Res))
			{
				$Clave=$Row[0];
			}
		}
		else
		{
			$Mensaje=pg_last_error($_Conexcion);
			print "$Mensaje";
		}
		return $Clave;
	}
	
	function InsertarProyectos($_Conexcion)
	{
		$bFlag=false;
		$Pro= new Proyecto;
		$Pro=$GLOBALS['Obj'];
		$Clave=$GLOBALS['ClaveProy'];
		
		$Sql=sprintf("Select InsertaProyectos('%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s')",$Clave,$Pro->Tipo,$Pro->Titulo,$Pro->Entidad,$Pro->FechaInicio,$Pro->FechaFin,$Pro->Area,$Pro->Diciplina,$Pro->Subdiciplina,$Pro->Sector,$Pro->Rama,$Pro->Clase,$Pro->IdMaestro);
		if(pg_query($_Conexcion,$Sql))
		{
			$bFlag=true;
		}
		else
		{
			$Error=pg_last_error($_Conexcion);
			print $Error;
		}
		return $bFlag;
	}
	
	function InsertarInvestigadores($_Conexcion)
	{
		$bFlag=false;
		
		$Investigadores=new Investigadores;
		$Investigadores=$GLOBALS['ObjInvesti'];
		$Clave=$GLOBALS['ClaveProy'];
		if(!empty($Investigadores->Nombre1))
		{
			$Sql=sprintf("Select insertainvestigadores('%s', '%s')",$Clave,$Investigadores->Nombre1);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		
		if(!empty($Investigadores->Nombre2))
		{
			$Sql=sprintf("Select insertainvestigadores('%s', '%s')",$Clave,$Investigadores->Nombre2);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		
		if(!empty($Investigadores->Nombre3))
		{
			$Sql=sprintf("Select insertainvestigadores('%s', '%s')",$Clave,$Investigadores->Nombre3);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		
		if(!empty($Investigadores->Nombre4))
		{
			$Sql=sprintf("Select insertainvestigadores('%s', '%s')",$Clave,$Investigadores->Nombre4);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		
		if(!empty($Investigadores->Nombre5))
		{
			$Sql=sprintf("Select insertainvestigadores('%s', '%s')",$Clave,$Investigadores->Nombre5);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		
		
		return $bFlag;
	}
	
	function InsertarEmpresas($_Conexcion)
	{
		$bFlag=true;
		
		$Empresa=new Empresa;
		$Empresa=$GLOBALS['ObjEmpres'];
		$Clave=$GLOBALS['ClaveProy'];
		if(!empty($Empresa->Nombre1))
		{
			$Sql=sprintf("Select insertainstituciones('%s', '%s')",$Clave,$Empresa->Nombre1);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				print"$Sql<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		
		if(!empty($Empresa->Nombre2))
		{
			$Sql=sprintf("Select insertainstituciones('%s', '%s')",$Clave,$Empresa->Nombre2);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				print"$Sql<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		
		if(!empty($Empresa->Nombre3))
		{
			$Sql=sprintf("Select insertainstituciones('%s', '%s')",$Clave,$Empresa->Nombre3);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				print"$Sql<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		
		if(!empty($Empresa->Nombre4))
		{
			$Sql=sprintf("Select insertainstituciones('%s', '%s')",$Clave,$Empresa->Nombre4);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				print"$Sql<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		
		if(!empty($Empresa->Nombre5))
		{
			$Sql=sprintf("Select insertainstituciones('%s', '%s')",$Clave,$Empresa->Nombre5);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				print"$Sql<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		
		
		return $bFlag;
	}
	
	function InsertarBecario($_Conexcion)
	{
		$bFlag=false;
		
		$Becario=new Empresa;
		$Becario=$GLOBALS['ObjBecario'];
		$Clave=$GLOBALS['ClaveProy'];
		if(!empty($Becario->Nombre1))
		{
			$Sql=sprintf("Select insertabecarios('%s', '%s')",$Clave,$Becario->Nombre1);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				print"$Sql<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		else
		{
			print "Variable Vacia<br>";
		}
		
		if(!empty($Becario->Nombre2))
		{
			$Sql=sprintf("Select insertabecarios('%s', '%s')",$Clave,$Becario->Nombre2);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				print"$Sql<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		else
		{
			print "Variable Vacia<br>";
		}
		
		if(!empty($Becario->Nombre3))
		{
			$Sql=sprintf("Select insertabecarios('%s', '%s')",$Clave,$Becario->Nombre3);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				print"$Sql<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		else
		{
			print "Variable Vacia<br>";
		}
		
		if(!empty($Becario->Nombre4))
		{
			$Sql=sprintf("Select insertabecarios('%s', '%s')",$Clave,$Becario->Nombre4);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				print"$Sql<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		else
		{
			print "Variable Vacia<br>";
		}
		
		if(!empty($Becario->Nombre5))
		{
			$Sql=sprintf("Select insertabecarios('%s', '%s')",$Clave,$Becario->Nombre5);
			if(!pg_query($_Conexcion,$Sql))
			{
				$Mensaje=pg_last_error($_Conexcion);
				print"$Mensaje<br>";
				print"$Sql<br>";
				$bFlag=false;
			}
			else
			{
				$bFlag=true;
			}
		}
		else
		{
			print "Variable Vacia<br>";
		}
		
		return $bFlag;
	}
?>
<html>
<head>
<title>Procesando...</title>
</head>
</html>